;QOPVNQXNxt̖vOP
;USrbgȂ̉ZFFӂ͔ȂB
;-------------
; ȉ MAIN ́Aӂɉ悤
; 삵ADD64ĂяoR[h
; N1  N2 ̒lύXĎssłB
MAIN START 
    LAD GR1,N1
    LAD GR2,N2
    CALL ADD64
    RET
;N1 DC #3F1D
;   DC #B759
;   DC #2E0C
;   DC #A684
;N2 DC #2E0C
;   DC #A684
;   DC #3F1D
;   DC #B759
N1  DC #0A00
    DC #0000
    DC #0000
    DC #00F0
N2  DC #0000
    DC #0000
    DC #0000
    DC #000A
    END
;---------------------
;ȉ ADD64 ́AɂR[ĥ܂܂łB
ADD64 START
    RPUSH
    LD GR0,=0
    LAD GR3,3,GR1
    LAD GR4,3,GR2
LOOP LD GR5,=0
    ADDL GR0,0,GR3
    JOV OV1
    JUMP NOV1
OV1 LD GR5,=1 ; a I@オm
NOV1 ADDL GR0,0,GR4
    JOV OV2
    JUMP NOV2
OV2 LD GR5,=1  ; a I@オm
NOV2 ST GR0,0,GR3
    LD GR0,GR5 ; オʌɉZp
    CPL GR3,GR1 ;₂E GR3 ŏʃAhXƓH
    JZE EXIT
    SUBL GR3,=1
    SUBL GR4,=1 ; b@I
    JUMP LOOP
EXIT RPOP
    RET
    END
;----------------------   -
